home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1996 March / EnigmA AMIGA RUN 05 (1996)(G.R. Edizioni)(IT)[!][issue 1996-03][Skylink CD IV].iso / earcd / music / sfxbn40m.lha / sfx-bin / Install-SFXbin next >
Text File  |  1996-01-09  |  6KB  |  196 lines
  1. ; Install-SFXbin Start --------------------------------------------------------------------------------------
  2. ;
  3. ; $VER: Install-SFXbin (02.12.1995)
  4. ;
  5. ; SoundFX bin Installscript
  6. ; (C) Copyright 1993-1995 Stefan Kost. All Rights Reserved.
  7. ;
  8. ; -----------------------------------------------------------------------------------------------------------
  9.  
  10. ; setze sprachenabhängige Texte -----------------------------------------------------------------------------
  11.  
  12. (IF (= @LANGUAGE "english")
  13. (
  14.     (SET #bad-kick            "SoundFX requires at least Kickstart 2.04 !")
  15.     (SET #welcome-messy     "\n\nWelcome to the installation of SoundFX !")
  16.     (SET #choose-dest        "Please choose a destination directory !\nA drawer called SFX will be automatically generated !")
  17.     (SET #choose-dest-help    "Here you can choose the place on your HD, were SFX should be installed")
  18.     (SET #dest-require        "\n\nPlease be shure, that you have on your HD at least 1.2 Mb free !")
  19.     (SET #copy-loader        "copying loadermoduls ...")
  20.     (SET #copy-operators    "copying operatormoduls ...")
  21.     (SET #copy-player        "copying playermoduls ...")
  22.     (SET #copy-rexx            "copying arexxscripts ...")
  23.     (SET #copy-saver        "copying savermoduls ...")
  24.     (SET #copy-executable    "copying executable ...")
  25.     (SET #copy-help            "The respective files will copied to your HD.")
  26.     (SET #choose-icon        "Please choose the the icon you want to install\n The 4 colour version is made for standart wb-colors and the 8 colour version is made for magic-wb !")
  27.     (SET #choose-icon-help    "If your wb-screen has more than 4 colours than choose the 8 colour version.\n This one looks nicer.")
  28.     (SET #exit-messy        "\n\nSFX is successfuly installed.\nPlease read the guide, to learn how to work with the program.\n")
  29. ))
  30. (IF (= @LANGUAGE "deutsch")
  31. (
  32.     (SET #bad-kick            "SoundFX benötigt mindestens Kickstart 2.04 !")
  33.     (SET #welcome-messy        "\n\nWillkommen zur Installation von SoundFX !")
  34.     (SET #choose-dest        "Bitte Zielverzeichnis aussuchen !\nEin Verzeichnis mit dem Namen SFX wird angelegt !")
  35.     (SET #choose-dest-help    "Hier können Sie auswählen, wohin Sie das Programm installeren möchten")
  36.     (SET #dest-require        "\n\nBitte stellen Sie sicher, daß auf der Zielpartition\n 1.2 Mb-Speicher frei ist !")
  37.     (SET #copy-loader        "kopiere Loader-Module ...")
  38.     (SET #copy-operators    "kopiere Operator-Module ...")
  39.     (SET #copy-player        "kopiere Player-Module ...")
  40.     (SET #copy-rexx            "kopiere ARexx-Scripts ...")
  41.     (SET #copy-saver        "kopiere Saver-Module ...")
  42.     (SET #copy-executable    "kopiere Executable ...")
  43.     (SET #copy-help            "Die entsprechenden Dateien werden gerade auf ihre Festplatte kopiert.")
  44.     (SET #choose-icon        "Bitte wählen Sie das Icon aus, das Sie installieren möchten !\n Die 4-farbige Variante ist für die Standart-WB und die 8-farbige für MagicWB !")
  45.     (SET #choose-icon-help    "Wenn Sie mehr als 4 Farben auf der WB haben, dann wählen Sie die 8-farbige Version.\n Diese sieht schöner aus.")
  46.     (SET #exit-messy        "\n\nSFX konnte erfolgreich installiert werden.\nBitte lesen Sie das Guide, um zu erfahren wie das Programm bedient wird.\n")
  47. ))
  48.  
  49. ; check kick version ----------------------------------------------------------------------------------------
  50.  
  51. (if (< (/ (getversion) 65536) 37)
  52.     (abort #bad-kick)
  53. )
  54.  
  55. ; los geht`s ------------------------------------------------------------------------------------------------
  56.  
  57. (COMPLETE 0)
  58. (MESSAGE #welcome-messy)
  59.  
  60. (SET @default-dest
  61.     (ASKDIR
  62.         (PROMPT #choose-dest)
  63.         (HELP #choose-dest-help)
  64.         (DEFAULT @default-dest)
  65.     )
  66. )
  67. (MESSAGE #dest-require)
  68. (COMPLETE 5)
  69. ; falls nicht vorhanden, Verzeichnis anlegen ----------------------------------------------------------------
  70. (SET @default-dest (TACKON @default-dest "SFX"))
  71. (SET sfx-dest @default-dest)
  72. (IF (= (EXISTS sfx-dest) 0)
  73.     (MAKEDIR sfx-dest (INFOS))
  74. )
  75.  
  76. ; Loader ----------------------------------------------------------------------------------------------------
  77. (COMPLETE 10)
  78. (SET sfxsub-dest (TACKON sfx-dest "_loader"))
  79. (IF (= (EXISTS sfxsub-dest) 0)
  80.     (MAKEDIR sfxsub-dest)
  81. )
  82. (COMPLETE 12)
  83. (COPYFILES
  84.     (PROMPT #copy-loader)
  85.     (HELP #copy-help)
  86.     (SOURCE "_loader/")
  87.     (DEST sfxsub-dest)
  88.     (ALL)
  89. )
  90.  
  91. ; Operators -------------------------------------------------------------------------------------------------
  92. (COMPLETE 25)
  93. (SET sfxsub-dest (TACKON sfx-dest "_operators"))
  94. (IF (= (EXISTS sfxsub-dest) 0)
  95.     (MAKEDIR sfxsub-dest)
  96. )
  97. (COMPLETE 27)
  98. (COPYFILES
  99.     (PROMPT #copy-operators)
  100.     (HELP #copy-help)
  101.     (SOURCE "_operators/")
  102.     (DEST sfxsub-dest)
  103.     (ALL)
  104. )
  105.  
  106. ; Player ----------------------------------------------------------------------------------------------------
  107. (COMPLETE 50)
  108. (SET sfxsub-dest (TACKON sfx-dest "_player"))
  109. (IF (= (EXISTS sfxsub-dest) 0)
  110.     (MAKEDIR sfxsub-dest)
  111. )
  112. (COMPLETE 52)
  113. (COPYFILES
  114.     (PROMPT #copy-player)
  115.     (HELP #copy-help)
  116.     (SOURCE "_player/")
  117.     (DEST sfxsub-dest)
  118.     (ALL)
  119. )
  120.  
  121. ; Rexx ------------------------------------------------------------------------------------------------------
  122. (COMPLETE 60)
  123. (SET sfxsub-dest (TACKON sfx-dest "_rexx"))
  124. (IF (= (EXISTS sfxsub-dest) 0)
  125.     (MAKEDIR sfxsub-dest)
  126. )
  127. (COMPLETE 62)
  128. (COPYFILES
  129.     (PROMPT #copy-rexx)
  130.     (HELP #copy-help)
  131.     (SOURCE "_rexx/")
  132.     (DEST sfxsub-dest)
  133.     (ALL)
  134. )
  135.  
  136. ; Saver -----------------------------------------------------------------------------------------------------
  137. (COMPLETE 70)
  138. (SET sfxsub-dest (TACKON sfx-dest "_saver"))
  139. (IF (= (EXISTS sfxsub-dest) 0)
  140.     (MAKEDIR sfxsub-dest)
  141. )
  142. (COMPLETE 72)
  143. (COPYFILES
  144.     (PROMPT #copy-saver)
  145.     (HELP #copy-help)
  146.     (SOURCE "_saver/")
  147.     (DEST sfxsub-dest)
  148.     (ALL)
  149. )
  150.  
  151. ; SFX -------------------------------------------------------------------------------------------------------
  152. (COMPLETE 80)
  153. (COPYFILES
  154.     (PROMPT #copy-executable)
  155.     (HELP #copy-help)
  156.     (SOURCE "sfx")
  157.     (DEST sfx-dest)
  158.     (NEWNAME "SoundFX")
  159. )
  160.  
  161. ; Icon ------------------------------------------------------------------------------------------------------
  162. (COMPLETE 95)
  163. (SET icon
  164.     (ASKCHOICE
  165.         (PROMPT #choose-icon)
  166.         (HELP -choose-icon-help)
  167.         (CHOICES
  168.             "4 colours"
  169.             "8 colours"
  170.         )
  171.         (DEFAULT 0)
  172.     )
  173. )
  174. (IF (= icon 0)
  175.     (COPYFILES
  176.         (SOURCE "icons/SoundFX_4col.info")
  177.         (DEST sfx-dest)
  178.         (NEWNAME "SoundFX.info")
  179.     )
  180. )
  181. (IF (= icon 1)
  182.     (COPYFILES
  183.         (SOURCE "icons/SoundFX_8col.info")
  184.         (DEST sfx-dest)
  185.         (NEWNAME "SoundFX.info")
  186.     )
  187. )
  188.  
  189. ; Fertig ----------------------------------------------------------------------------------------------------
  190. (COMPLETE 99)
  191. (MESSAGE #exit-messy)
  192. (COMPLETE 100)
  193.  
  194. (EXIT (QUIET))
  195. ; Install-SFXbin Ende ---------------------------------------------------------------------------------------
  196.